Namespace HBBSoft.Pivot
    <System.Serializable()> Public NotInheritable Class MeasureCollection
        Inherits System.Collections.CollectionBase

        Default Public Property Item(ByVal Index As Integer) As Measure
            Get
                Return CType(List.Item(Index), Measure)
            End Get
            Set(ByVal value As Measure)
                List.Item(Index) = value
            End Set
        End Property

        Public Sub Add(ByRef value As Measure)
            List.Add(value)
        End Sub

        Public Sub Insert(ByVal Index As Integer, ByRef value As Measure)
            List.Insert(Index, value)
        End Sub

        Public Sub Remove(ByRef value As Measure)
            List.Remove(value)
        End Sub

        Public Function Contains(ByRef value As Measure) As Boolean
            Return List.Contains(value)
        End Function

        Public Function IndexOf(ByRef value As Measure) As Integer
            Return List.IndexOf(value)
        End Function
    End Class
End Namespace
